version 14.2
set more off

***********************************************************************************************************************
* THIS ROUTINE GENERATES FIGURE A.VIII OF WASEEM (2020) ROLE OF WITHHOLDING ...
***********************************************************************************************************************

use				"$project_data\USD_PKR_1995_2005.dta", clear
#d				;
twoway  		(connected  Price taxperiod if taxperiod>=416862 & taxperiod<494690, sort lwidth(thick) lcolor(red) mcolor(red) msymbol(o)),
				xtitle("Month of the Year") xscale(titlegap(*10))
				xlabel(416862 "97" 427972 "98" 439081 "99" 450223 "00" 461333 "01" 472441 "02" 
				483551 "03" 494690 "04") 
				xline(427972 439081 450223, lpatter(dash) lcolor(green))
				yscale(r(0))  yscale(titlegap(*10)) ytitle("PKR Per USD") 
				ylabel(0(20)80) 
				graphregion(fcolor(white) style(none) color(white) margin(0 2 0 2)) bgcolor(white);
graph 			export "$project_output\USD_PKR_1997_2004.eps", replace;
#d				cr

use				"$project_data\USD_PKR_1997_2010.dta", clear
keep			if Date>d(30jun2004)
#d				;
twoway  		(connected  Price period, sort lwidth(thick) lcolor(red) mcolor(red) msymbol(o)),
				xtitle("Month of the Year") xscale(titlegap(*10))
				xlabel(85 "04" 97 "05" 109 "06" 121 "07" 133 "08" 145 "09" 
				157 "10" 169 "11") 
				xline(97 109 121, lpatter(dash) lcolor(green))
				yscale(r(0))  yscale(titlegap(*10)) ytitle("PKR Per USD") 
				ylabel(0(20)100) 
				graphregion(fcolor(white) style(none) color(white) margin(0 2 0 2)) bgcolor(white);
graph 			export "$project_output\USD_PKR_2004_2010.eps", replace;
#d				cr



